home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni & Inventori / Invenzioni and Inventori (Eclectica Publishing) (1996).ISO / invenzio / spazio / mi120.dir / 00268_Script_268 < prev    next >
Text File  |  1983-02-01  |  827b  |  29 lines
  1. on exitFrame
  2.   global a_blocca
  3.   if a_blocca=false then
  4.     ATT_HILITE 109,122,106,14,1,2
  5.     
  6.   end if
  7.       go to the frame
  8.   
  9.   
  10.   on mouseup
  11.     if the mouseH > 53  and the mouseH <562 and the mouseV >0 and the mouseV < 450 then
  12.       global a_blocca, scrolla
  13.       set a_blocca = false
  14.       set scrolla = true
  15.       ---------------------------------------------------------testo introduttivo se c'Φ
  16.       vap "su", 143, "nobeep"    
  17.       
  18.       ---------------------------------------------------------freccette
  19.       set the visible of sprite 22  to false
  20.       set the visible of sprite 23  to false
  21.       ---------------------------------------------------------elem. dida
  22.       set the visible of sprite 20  to false
  23.       set the visible of sprite 21  to false
  24.       
  25.     end if
  26.   
  27. end
  28.  
  29.